# -*- mode: snippet -*-
# name: meta::metabin Meta-analysis of binary outcome data
# key: metabin@meta
# contributor: Shuguang Sun
# --
$0 <- meta::metabin(
  event.e, n.e, event.c, n.c,
  data = ${1:dt},
  studlab = ${2:glue::glue("{study} ({pop})")},
  sm = "RR",
  method = "mh"
)
